home *** CD-ROM | disk | FTP | other *** search
Unknown | 1995-09-19 | 5.6 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| ce 17 20 30 2c 32 35 36 | 00 00 20 20 64 72 31 3d |.. 0,256|.. dr1=|
|00000010| 32 33 36 3a 64 72 32 3d | 33 39 00 20 20 64 62 31 |236:dr2=|39. db1|
|00000020| 3d 37 3a 64 62 32 3d 32 | 32 37 20 20 3a 00 20 20 |=7:db2=2|27 :. |
|00000030| 6d 78 31 3d 32 34 32 3a | 6d 78 32 3d 32 31 34 00 |mx1=242:|mx2=214.|
|00000040| 00 20 20 80 16 20 74 72 | 2e 77 3d 30 20 80 18 20 |. .. tr|.w=0 .. |
|00000050| 31 35 00 20 20 20 20 80 | 0b 20 74 72 3d 30 00 20 |15. .|. tr=0. |
|00000060| 20 20 20 20 20 72 3d 30 | 00 20 20 20 20 80 22 00 | r=0|. .".|
|00000070| 20 20 20 20 20 20 72 3d | 28 74 72 29 2f 31 35 00 | r=|(tr)/15.|
|00000080| 20 20 20 20 80 c0 00 00 | 20 20 20 20 80 16 20 74 | ....| .. t|
|00000090| 62 2e 77 3d 30 20 80 18 | 20 31 35 00 00 20 20 20 |b.w=0 ..| 15.. |
|000000a0| 20 20 20 80 0b 20 74 62 | 3d 30 00 20 20 20 20 20 | .. tb|=0. |
|000000b0| 20 20 20 62 3d 30 00 20 | 20 20 20 20 20 80 22 00 | b=0. | .".|
|000000c0| 20 20 20 20 20 20 20 20 | 62 3d 28 74 62 29 2f 31 | |b=(tb)/1|
|000000d0| 35 00 20 20 20 20 20 20 | 80 c0 00 00 20 20 20 20 |5. |.... |
|000000e0| 20 20 63 6f 6c 3d 74 72 | 2b 74 62 20 80 44 20 34 | col=tr|+tb .D 4|
|000000f0| 00 00 20 20 20 20 20 20 | 6d 72 3d 32 32 31 3a 6d |.. |mr=221:m|
|00000100| 62 3d 32 32 31 00 00 20 | 20 20 20 20 20 6d 72 3d |b=221.. | mr=|
|00000110| 6d 72 2b 72 2a 28 64 72 | 31 2d 32 32 31 29 20 2b |mr+r*(dr|1-221) +|
|00000120| 62 2a 28 64 62 31 2d 32 | 32 31 29 20 2b 72 2a 62 |b*(db1-2|21) +r*b|
|00000130| 2a 28 6d 78 31 2d 32 32 | 31 29 00 20 20 20 20 20 |*(mx1-22|1). |
|00000140| 20 6d 62 3d 6d 62 2b 72 | 2a 28 64 72 32 2d 32 32 | mb=mb+r|*(dr2-22|
|00000150| 31 29 20 2b 62 2a 28 64 | 62 32 2d 32 32 31 29 20 |1) +b*(d|b2-221) |
|00000160| 2b 72 2a 62 2a 28 6d 78 | 32 2d 32 32 31 29 00 00 |+r*b*(mx|2-221)..|
|00000170| 20 20 20 20 20 20 6d 72 | 3d bc 0a 28 6d 72 2c 30 | mr|=..(mr,0|
|00000180| 2c 32 35 35 29 00 20 20 | 20 20 20 20 6d 62 3d bc |,255). | mb=.|
|00000190| 0a 28 6d 62 2c 30 2c 32 | 35 35 29 00 20 20 20 20 |.(mb,0,2|55). |
|000001a0| 20 20 ce 0e 20 30 2c 63 | 6f 6c 2c 6d 72 2c 6d 62 | .. 0,c|ol,mr,mb|
|000001b0| 2c 6d 62 00 20 20 20 20 | 80 17 00 20 20 80 17 00 |,mb. |... ...|
|000001c0| 20 20 c7 86 20 30 2c 30 | 00 00 00 00 d0 01 20 30 | .. 0,0|...... 0|
|000001d0| 2c 33 32 30 2c 32 35 36 | 2c 38 00 d0 01 20 31 2c |,320,256|,8... 1,|
|000001e0| 33 32 30 2c 32 35 36 2c | 38 00 bb 8c 20 30 2c 32 |320,256,|8... 0,2|
|000001f0| 2c 24 66 00 bb 8c 20 30 | 2c 33 2c 24 66 30 00 3b |,$f... 0|,3,$f0.;|
|00000200| 49 6e 69 74 43 6f 70 4c | 69 73 74 20 30 2c 34 34 |InitCopL|ist 0,44|
|00000210| 2c 32 35 36 2c 24 31 33 | 30 30 38 2c 30 2c 32 35 |,256,$13|008,0,25|
|00000220| 36 2c 30 00 3b 42 69 74 | 4d 61 70 20 30 2c 33 32 |6,0.;Bit|Map 0,32|
|00000230| 30 2c 32 35 36 2c 38 00 | c7 82 20 30 2c 34 34 2c |0,256,8.|.. 0,44,|
|00000240| 32 35 36 2c 24 31 33 30 | 30 38 2c 30 2c 32 35 36 |256,$130|08,0,256|
|00000250| 2c 30 00 00 00 80 34 00 | c7 83 20 30 00 c7 84 20 |,0....4.|.. 0... |
|00000260| 30 2c 30 00 c7 86 20 30 | 2c 30 00 3b 44 69 73 70 |0,0... 0|,0.;Disp|
|00000270| 6c 61 79 50 61 6c 65 74 | 74 65 20 30 2c 31 00 00 |layPalet|te 0,1..|
|00000280| 80 2c 20 d0 01 20 30 00 | 23 73 69 7a 65 3d 36 00 |., .. 0.|#size=6.|
|00000290| 23 62 67 3d 31 20 80 44 | 20 23 73 69 7a 65 00 23 |#bg=1 .D| #size.#|
|000002a0| 62 69 67 3d 23 62 67 2d | 31 00 00 80 04 20 68 28 |big=#bg-|1.... h(|
|000002b0| 23 62 67 2c 23 62 67 29 | 2c 64 78 28 23 62 67 2c |#bg,#bg)|,dx(#bg,|
|000002c0| 23 62 67 29 2c 64 79 28 | 23 62 67 2c 23 62 67 29 |#bg),dy(|#bg,#bg)|
|000002d0| 00 00 80 1c 20 31 3d 30 | 00 68 28 30 2c 30 29 3d |.... 1=0|.h(0,0)=|
|000002e0| 31 2e 30 3a 68 28 30 2c | 23 62 67 29 3d 30 2e 35 |1.0:h(0,|#bg)=0.5|
|000002f0| 00 68 28 23 62 67 2c 30 | 29 3d 30 3a 68 28 23 62 |.h(#bg,0|)=0:h(#b|
|00000300| 67 2c 23 62 67 29 3d 30 | 2e 35 00 64 78 28 30 2c |g,#bg)=0|.5.dx(0,|
|00000310| 30 29 3d 2d 35 3a 64 78 | 28 23 62 67 2c 30 29 3d |0)=-5:dx|(#bg,0)=|
|00000320| 2d 35 00 64 79 28 30 2c | 30 29 3d 35 00 64 78 28 |-5.dy(0,|0)=5.dx(|
|00000330| 23 62 67 2c 23 62 67 29 | 3d 33 00 64 78 28 30 2c |#bg,#bg)|=3.dx(0,|
|00000340| 23 62 67 29 3d 2d 33 00 | 00 3b 64 78 28 30 2c 30 |#bg)=-3.|.;dx(0,0|
|00000350| 29 3d 2d 35 00 00 3b 45 | 78 63 68 61 6e 67 65 20 |)=-5..;E|xchange |
|00000360| 68 28 30 2c 23 62 67 29 | 2c 68 28 23 62 67 2c 30 |h(0,#bg)|,h(#bg,0|
|00000370| 29 00 3b 45 78 63 68 61 | 6e 67 65 20 64 78 28 30 |).;Excha|nge dx(0|
|00000380| 2c 30 29 2c 64 79 28 30 | 2c 30 29 00 3b 45 78 63 |,0),dy(0|,0).;Exc|
|00000390| 68 61 6e 67 65 20 64 78 | 28 23 62 67 2c 23 62 67 |hange dx|(#bg,#bg|
|000003a0| 29 2c 64 79 28 23 62 67 | 2c 23 62 67 29 00 3b 45 |),dy(#bg|,#bg).;E|
|000003b0| 78 63 68 61 6e 67 65 20 | 64 78 28 30 2c 23 62 67 |xchange |dx(0,#bg|
|000003c0| 29 2c 64 79 28 23 62 67 | 2c 30 29 00 3b 45 78 63 |),dy(#bg|,0).;Exc|
|000003d0| 68 61 6e 67 65 20 64 78 | 28 23 62 67 2c 30 29 2c |hange dx|(#bg,0),|
|000003e0| 64 79 28 30 2c 23 62 67 | 29 00 80 1e 00 20 20 80 |dy(0,#bg|).... .|
|000003f0| 0d 20 72 00 20 20 20 20 | bc 07 28 38 29 2d 34 00 |. r. |..(8)-4.|
|00000400| 20 20 80 02 20 80 0d 00 | 20 20 64 78 28 30 2c 30 | .. ...| dx(0,0|
|00000410| 29 3d 21 72 00 20 20 64 | 79 28 30 2c 30 29 3d 21 |)=!r. d|y(0,0)=!|
|00000420| 72 00 20 20 64 78 28 30 | 2c 23 62 67 29 3d 21 72 |r. dx(0|,#bg)=!r|
|00000430| 00 20 20 64 79 28 30 2c | 23 62 67 29 3d 21 72 00 |. dy(0,|#bg)=!r.|
|00000440| 20 20 64 78 28 23 62 67 | 2c 23 62 67 29 3d 21 72 | dx(#bg|,#bg)=!r|
|00000450| 00 20 20 64 79 28 23 62 | 67 2c 23 62 67 29 3d 21 |. dy(#b|g,#bg)=!|
|00000460| 72 00 20 20 64 78 28 23 | 62 67 2c 30 29 3d 21 72 |r. dx(#|bg,0)=!r|
|00000470| 00 20 20 64 79 28 23 62 | 67 2c 30 29 3d 21 72 00 |. dy(#b|g,0)=!r.|
|00000480| 80 1f 00 00 00 80 06 20 | 43 72 65 61 74 65 00 00 |....... |Create..|
|00000490| 3b 46 6f 72 20 66 72 2e | 77 3d 30 20 54 6f 20 32 |;For fr.|w=0 To 2|
|000004a0| 39 00 3b 20 20 61 6e 67 | 3d 32 2a 50 69 2f 33 30 |9.; ang|=2*Pi/30|
|000004b0| 2a 66 72 2b 50 69 2a 30 | 2e 32 35 00 3b 20 20 55 |*fr+Pi*0|.25.; U|
|000004c0| 73 65 20 42 69 74 4d 61 | 70 20 30 3a 43 6c 73 3a |se BitMa|p 0:Cls:|
|000004d0| 47 6f 73 75 62 20 44 72 | 61 77 32 00 3b 20 20 51 |Gosub Dr|aw2.; Q|
|000004e0| 41 4d 49 47 41 00 3b 20 | 20 56 57 61 69 74 20 31 |AMIGA.; | VWait 1|
|000004f0| 30 3a 66 69 24 3d 22 64 | 68 30 3a 66 69 72 65 2f |0:fi$="d|h0:fire/|
|00000500| 70 69 78 2f 70 69 63 2e | 22 2b 52 69 67 68 74 24 |pix/pic.|"+Right$|
|00000510| 28 53 74 72 24 28 31 30 | 30 30 31 2b 66 72 29 2c |(Str$(10|001+fr),|
|00000520| 34 29 00 3b 20 20 53 61 | 76 65 42 69 74 6d 61 70 |4).; Sa|veBitmap|
|00000530| 20 30 2c 66 69 24 2c 30 | 00 3b 20 20 56 57 61 69 | 0,fi$,0|.; VWai|
|00000540| 74 20 31 30 00 3b 20 20 | 49 66 20 4a 6f 79 62 28 |t 10.; |If Joyb(|
|00000550| 30 29 3c 3e 30 20 54 68 | 65 6e 20 45 6e 64 00 3b |0)<>0 Th|en End.;|
|00000560| 20 20 42 4c 49 54 5a 00 | 3b 00 3b 4e 65 78 74 00 | BLITZ.|;.;Next.|
|00000570| 3b 41 4d 49 47 41 00 00 | 3b 56 57 61 69 74 20 31 |;AMIGA..|;VWait 1|
|00000580| 30 3a 45 6e 64 00 3b 42 | 4c 49 54 5a 00 00 80 1c |0:End.;B|LITZ....|
|00000590| 20 31 3d 31 00 20 20 3b | 61 6e 67 3d 50 69 2a 30 | 1=1. ;|ang=Pi*0|
|000005a0| 2e 32 35 00 20 20 61 6e | 67 3d 30 2e 37 3b 50 69 |.25. an|g=0.7;Pi|
|000005b0| 2a 30 2e 32 35 00 20 20 | 71 63 32 3d e0 05 28 61 |*0.25. |qc2=..(a|
|000005c0| 6e 67 2b 80 ba 29 00 20 | 20 71 73 32 3d e0 0a 28 |ng+..). | qs2=..(|
|000005d0| 61 6e 67 2b 80 ba 29 00 | 00 20 20 80 2c 20 d0 01 |ang+..).|. ., ..|
|000005e0| 20 32 3a 80 06 20 44 72 | 61 77 32 00 20 20 61 6e | 2:.. Dr|aw2. an|
|000005f0| 67 2d 30 2e 30 35 00 20 | 20 80 2c 20 d0 01 20 33 |g-0.05. | ., .. 3|
|00000600| 3a 80 06 20 44 72 61 77 | 32 00 20 20 80 0a 00 20 |:.. Draw|2. ... |
|00000610| 20 80 0b 20 df 04 28 30 | 29 3e 31 00 20 20 20 20 | .. ..(0|)>1. |
|00000620| 80 35 3a 80 37 20 34 00 | 20 20 20 20 b9 01 20 30 |.5:.7 4.| .. 0|
|00000630| 2c 22 72 61 6d 3a 62 6c | 61 68 2e 69 66 66 22 2c |,"ram:bl|ah.iff",|
|00000640| 30 00 20 20 20 20 80 02 | 00 20 20 20 20 80 34 00 |0. ..|. .4.|
|00000650| 20 20 80 c0 00 20 20 80 | 02 00 80 1f 00 00 61 6e | ... .|......an|
|00000660| 67 3d 30 2e 37 00 66 72 | 61 64 69 72 3d 30 2e 31 |g=0.7.fr|adir=0.1|
|00000670| 00 80 bb 00 00 20 20 c7 | 84 20 30 2c 64 62 3a 80 |..... .|. 0,db:.|
|00000680| 37 3a 64 62 3d 31 2d 64 | 62 3a 80 2c 20 d0 01 20 |7:db=1-d|b:., .. |
|00000690| 64 62 3a b2 05 00 00 3b | 20 20 66 72 61 3d 66 72 |db:....;| fra=fr|
|000006a0| 61 2b 66 72 61 64 69 72 | 3a 6e 66 72 61 3d 51 4c |a+fradir|:nfra=QL|
|000006b0| 69 6d 69 74 28 66 72 61 | 2c 30 2c 31 29 00 3b 20 |imit(fra|,0,1).; |
|000006c0| 20 49 66 20 6e 66 72 61 | 3c 3e 66 72 61 20 54 68 | If nfra|<>fra Th|
|000006d0| 65 6e 20 66 72 61 3d 6e | 66 72 61 3a 66 72 61 64 |en fra=n|fra:frad|
|000006e0| 69 72 3d 2d 66 72 61 64 | 69 72 00 20 20 61 6e 67 |ir=-frad|ir. ang|
|000006f0| 3d 61 6e 67 2b 30 2e 30 | 34 00 20 20 80 06 20 44 |=ang+0.0|4. .. D|
|00000700| 72 61 77 32 00 80 bc 20 | df 04 28 30 29 3c 3e 30 |raw2... |..(0)<>0|
|00000710| 00 80 02 00 00 00 80 0d | 20 73 65 74 64 65 76 73 |........| setdevs|
|00000720| 00 20 20 64 78 28 6e 78 | 2c 6e 79 29 3d 6d 69 64 |. dx(nx|,ny)=mid|
|00000730| 64 78 20 2b 28 60 31 2a | 84 81 28 6e 78 2b 34 2e |dx +(`1*|..(nx+4.|
|00000740| 37 2c 6e 79 29 2a 73 63 | 29 00 20 20 64 79 28 6e |7,ny)*sc|). dy(n|
|00000750| 78 2c 6e 79 29 3d 6d 69 | 64 64 79 20 2b 28 60 31 |x,ny)=mi|ddy +(`1|
|00000760| 2a 84 81 28 6e 78 2b 32 | 2e 35 2c 6e 79 29 2a 73 |*..(nx+2|.5,ny)*s|
|00000770| 63 29 00 00 80 02 20 80 | 0d 00 00 2e 43 72 65 61 |c).... .|....Crea|
|00000780| 74 65 00 00 20 20 73 69 | 7a 65 3d 23 73 69 7a 65 |te.. si|ze=#size|
|00000790| 00 3b 20 20 73 69 7a 65 | 3d 30 00 00 20 20 73 63 |.; size|=0.. sc|
|000007a0| 61 6c 66 61 63 3d 30 2e | 32 00 00 20 20 80 0c 20 |alfac=0.|2.. .. |
|000007b0| 73 69 7a 65 3e 30 00 20 | 20 20 20 6f 73 3d 73 69 |size>0. | os=si|
|000007c0| 7a 65 3a 73 69 7a 65 20 | 2d 20 31 00 20 20 20 20 |ze:size |- 1. |
|000007d0| 73 63 61 6c 3d 23 73 69 | 7a 65 2d 6f 73 00 20 20 |scal=#si|ze-os. |
|000007e0| 20 20 73 63 3d 31 20 80 | 45 20 73 63 61 6c 00 20 | sc=1 .|E scal. |
|000007f0| 20 20 20 62 63 3d 31 20 | 80 44 20 6f 73 3a 62 63 | bc=1 |.D os:bc|
|00000800| 68 3d 31 20 80 44 20 73 | 69 7a 65 00 20 20 20 20 |h=1 .D s|ize. |
|00000810| 80 16 20 78 78 3d 30 20 | 80 18 20 23 62 67 20 80 |.. xx=0 |.. #bg .|
|00000820| 19 20 62 63 00 20 20 20 | 20 20 20 80 16 20 79 79 |. bc. | .. yy|
|00000830| 3d 30 20 80 18 20 23 62 | 67 20 80 19 20 62 63 00 |=0 .. #b|g .. bc.|
|00000840| 00 20 20 20 20 20 20 20 | 20 80 0b 20 78 78 3c 23 |. | .. xx<#|
|00000850| 62 67 00 20 20 20 20 20 | 20 20 20 20 20 6e 78 3d |bg. | nx=|
|00000860| 78 78 2b 62 63 68 3a 6e | 79 3d 79 79 3a 66 78 3d |xx+bch:n|y=yy:fx=|
|00000870| 78 78 2b 62 63 3a 66 79 | 3d 79 79 00 20 20 20 20 |xx+bc:fy|=yy. |
|00000880| 20 20 20 20 20 20 7a 31 | 3d 68 28 78 78 2c 79 79 | z1|=h(xx,yy|
|00000890| 29 00 20 20 20 20 20 20 | 20 20 20 20 64 31 3d 64 |). | d1=d|
|000008a0| 78 28 78 78 2c 79 79 29 | 3a 64 32 3d 64 78 28 78 |x(xx,yy)|:d2=dx(x|
|000008b0| 78 2b 62 63 2c 79 79 29 | 00 20 20 20 20 20 20 20 |x+bc,yy)|. |
|000008c0| 20 20 20 64 78 61 3d 68 | 28 78 78 2b 62 63 2c 79 | dxa=h|(xx+bc,y|
|000008d0| 79 20 20 20 29 2d 7a 31 | 00 20 20 20 20 20 20 20 |y )-z1|. |
|000008e0| 20 20 20 6d 69 64 7a 3d | 7a 31 2b 64 78 61 20 80 | midz=|z1+dxa .|
|000008f0| 45 20 31 2b 20 28 28 64 | 31 2d 64 32 29 20 80 45 |E 1+ ((d|1-d2) .E|
|00000900| 20 28 33 2b 73 63 61 6c | 29 29 3b 2b 31 2a 52 61 | (3+scal|));+1*Ra|
|00000910| 6e 64 6f 6d 31 28 6e 78 | 2c 6e 79 29 2a 73 63 00 |ndom1(nx|,ny)*sc.|
|00000920| 20 20 20 20 20 20 20 20 | 20 20 6d 69 64 64 78 3d | | middx=|
|00000930| 28 64 78 61 2a 31 2e 35 | 20 80 44 20 73 63 61 6c |(dxa*1.5| .D scal|
|00000940| 29 20 2d 28 64 32 2b 64 | 31 29 20 80 45 20 32 00 |) -(d2+d|1) .E 2.|
|00000950| 20 20 20 20 20 20 20 20 | 20 20 6d 69 64 64 79 3d | | middy=|
|00000960| 28 64 79 28 78 78 2c 79 | 79 29 2b 64 79 28 66 78 |(dy(xx,y|y)+dy(fx|
|00000970| 2c 66 79 29 29 20 80 45 | 20 31 00 00 20 20 20 20 |,fy)) .E| 1.. |
|00000980| 20 20 20 20 20 20 68 28 | 6e 78 2c 6e 79 29 3d 6d | h(|nx,ny)=m|
|00000990| 69 64 7a 20 2b 28 84 81 | 28 6e 78 2b 32 2e 31 2c |idz +(..|(nx+2.1,|
|000009a0| 6e 79 2b 35 2e 34 29 29 | 2a 73 63 2a 73 63 61 6c |ny+5.4))|*sc*scal|
|000009b0| 66 61 63 00 20 20 20 20 | 20 20 20 20 20 20 21 73 |fac. | !s|
|000009c0| 65 74 64 65 76 73 7b 32 | 7d 00 20 20 20 20 20 20 |etdevs{2|}. |
|000009d0| 20 20 80 c0 00 00 20 20 | 20 20 20 20 20 20 80 0b | .... | ..|
|000009e0| 20 79 79 3c 23 62 67 00 | 20 20 20 20 20 20 20 20 | yy<#bg.| |
|000009f0| 20 20 6e 78 3d 78 78 3a | 6e 79 3d 79 79 2b 62 63 | nx=xx:|ny=yy+bc|
|00000a00| 68 3a 66 78 3d 78 78 3a | 66 79 3d 79 79 2b 62 63 |h:fx=xx:|fy=yy+bc|
|00000a10| 00 20 20 20 20 20 20 20 | 20 20 20 7a 31 3d 68 28 |. | z1=h(|
|00000a20| 78 78 2c 79 79 29 00 20 | 20 20 20 20 20 20 20 20 |xx,yy). | |
|00000a30| 20 64 31 3d 64 79 28 78 | 78 2c 79 79 29 3a 64 32 | d1=dy(x|x,yy):d2|
|00000a40| 3d 64 79 28 78 78 2c 79 | 79 2b 62 63 29 00 20 20 |=dy(xx,y|y+bc). |
|00000a50| 20 20 20 20 20 20 20 20 | 64 79 61 3d 68 28 78 78 | |dya=h(xx|
|00000a60| 2c 79 79 2b 62 63 20 29 | 2d 7a 31 00 20 20 20 20 |,yy+bc )|-z1. |
|00000a70| 20 20 20 20 20 20 6d 69 | 64 7a 3d 7a 31 2b 64 79 | mi|dz=z1+dy|
|00000a80| 61 20 80 45 20 31 2b 20 | 28 28 64 31 2d 64 32 29 |a .E 1+ |((d1-d2)|
|00000a90| 20 80 45 20 28 33 2b 73 | 63 61 6c 29 29 3b 2b 31 | .E (3+s|cal));+1|
|00000aa0| 2a 52 61 6e 64 6f 6d 31 | 28 6e 78 2c 6e 79 29 2a |*Random1|(nx,ny)*|
|00000ab0| 73 63 00 20 20 20 20 20 | 20 20 20 20 20 6d 69 64 |sc. | mid|
|00000ac0| 64 78 3d 28 64 78 28 78 | 78 2c 79 79 29 2b 64 78 |dx=(dx(x|x,yy)+dx|
|00000ad0| 28 66 78 2c 66 79 29 29 | 20 80 45 20 31 00 20 20 |(fx,fy))| .E 1. |
|00000ae0| 20 20 20 20 20 20 20 20 | 6d 69 64 64 79 3d 28 64 | |middy=(d|
|00000af0| 79 61 2a 31 2e 35 20 80 | 44 20 73 63 61 6c 29 20 |ya*1.5 .|D scal) |
|00000b00| 2d 28 64 32 2b 64 31 29 | 20 80 45 20 32 00 00 20 |-(d2+d1)| .E 2.. |
|00000b10| 20 20 20 20 20 20 20 20 | 20 68 28 6e 78 2c 6e 79 | | h(nx,ny|
|00000b20| 29 3d 6d 69 64 7a 20 2b | 28 84 81 28 6e 78 2b 32 |)=midz +|(..(nx+2|
|00000b30| 2e 31 2c 6e 79 2b 35 2e | 34 29 29 2a 73 63 2a 73 |.1,ny+5.|4))*sc*s|
|00000b40| 63 61 6c 66 61 63 00 20 | 20 20 20 20 20 20 20 20 |calfac. | |
|00000b50| 20 21 73 65 74 64 65 76 | 73 7b 32 7d 00 00 00 20 | !setdev|s{2}... |
|00000b60| 20 20 20 20 20 20 20 20 | 20 80 0b 20 78 78 3c 23 | | .. xx<#|
|00000b70| 62 67 00 20 20 20 20 20 | 20 20 20 20 20 20 20 6e |bg. | n|
|00000b80| 78 3d 78 78 2b 62 63 68 | 3a 6e 79 3d 79 79 2b 62 |x=xx+bch|:ny=yy+b|
|00000b90| 63 68 00 20 20 20 20 20 | 20 20 20 20 20 20 20 7a |ch. | z|
|00000ba0| 31 3d 68 28 78 78 2c 79 | 79 20 20 20 29 3a 7a 32 |1=h(xx,y|y ):z2|
|00000bb0| 3d 68 28 78 78 2b 62 63 | 2c 79 79 20 20 20 29 00 |=h(xx+bc|,yy ).|
|00000bc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 7a 33 3d 68 | | z3=h|
|00000bd0| 28 78 78 2c 79 79 2b 62 | 63 29 3a 7a 34 3d 68 28 |(xx,yy+b|c):z4=h(|
|00000be0| 78 78 2b 62 63 2c 79 79 | 2b 62 63 29 00 00 20 20 |xx+bc,yy|+bc).. |
|00000bf0| 20 20 20 20 20 20 20 20 | 20 20 64 78 61 3d 28 7a | | dxa=(z|
|00000c00| 32 2d 7a 31 20 2b 7a 34 | 2d 7a 33 29 20 80 45 20 |2-z1 +z4|-z3) .E |
|00000c10| 31 00 20 20 20 20 20 20 | 20 20 20 20 20 20 64 78 |1. | dx|
|00000c20| 31 3d 28 64 78 28 78 78 | 20 20 20 2c 79 79 29 2b |1=(dx(xx| ,yy)+|
|00000c30| 64 78 28 78 78 20 20 20 | 2c 79 79 2b 62 63 29 29 |dx(xx |,yy+bc))|
|00000c40| 20 80 45 20 31 00 20 20 | 20 20 20 20 20 20 20 20 | .E 1. | |
|00000c50| 20 20 64 78 32 3d 28 64 | 78 28 78 78 2b 62 63 2c | dx2=(d|x(xx+bc,|
|00000c60| 79 79 29 2b 64 78 28 78 | 78 2b 62 63 2c 79 79 2b |yy)+dx(x|x+bc,yy+|
|00000c70| 62 63 29 29 20 80 45 20 | 31 00 00 20 20 20 20 20 |bc)) .E |1.. |
|00000c80| 20 20 20 20 20 20 20 64 | 79 61 3d 28 7a 33 2d 7a | d|ya=(z3-z|
|00000c90| 31 20 2b 7a 34 2d 7a 32 | 29 20 80 45 20 31 00 20 |1 +z4-z2|) .E 1. |
|00000ca0| 20 20 20 20 20 20 20 20 | 20 20 20 64 79 31 3d 28 | | dy1=(|
|00000cb0| 64 79 28 78 78 2c 79 79 | 20 20 20 29 2b 64 79 28 |dy(xx,yy| )+dy(|
|00000cc0| 78 78 2b 62 63 2c 79 79 | 20 20 20 29 29 20 80 45 |xx+bc,yy| )) .E|
|00000cd0| 20 31 00 20 20 20 20 20 | 20 20 20 20 20 20 20 64 | 1. | d|
|00000ce0| 79 32 3d 28 64 79 28 78 | 78 2c 79 79 2b 62 63 29 |y2=(dy(x|x,yy+bc)|
|00000cf0| 2b 64 79 28 78 78 2b 62 | 63 2c 79 79 2b 62 63 29 |+dy(xx+b|c,yy+bc)|
|00000d00| 29 20 80 45 20 31 00 00 | 00 20 20 20 20 20 20 20 |) .E 1..|. |
|00000d10| 20 20 20 20 20 6d 69 64 | 7a 3d 28 7a 31 2b 7a 32 | mid|z=(z1+z2|
|00000d20| 2b 7a 33 2b 7a 34 29 20 | 80 45 20 32 00 20 20 20 |+z3+z4) |.E 2. |
|00000d30| 20 20 20 20 20 20 20 20 | 20 6d 69 64 7a 3d 6d 69 | | midz=mi|
|00000d40| 64 7a 2b 28 28 64 78 31 | 2d 64 78 32 2b 64 79 31 |dz+((dx1|-dx2+dy1|
|00000d50| 2d 64 79 32 29 20 80 45 | 20 28 33 2b 73 63 61 6c |-dy2) .E| (3+scal|
|00000d60| 29 29 00 20 20 20 20 20 | 20 20 20 20 20 20 20 68 |)). | h|
|00000d70| 28 6e 78 2c 6e 79 29 3d | 6d 69 64 7a 20 2b 28 84 |(nx,ny)=|midz +(.|
|00000d80| 81 28 6e 78 2b 32 2e 31 | 2c 6e 79 2b 35 2e 34 29 |.(nx+2.1|,ny+5.4)|
|00000d90| 29 2a 73 63 2a 31 2e 34 | 31 34 2a 73 63 61 6c 66 |)*sc*1.4|14*scalf|
|00000da0| 61 63 00 00 20 20 20 20 | 20 20 20 20 20 20 20 20 |ac.. | |
|00000db0| 6d 69 64 64 78 3d 28 64 | 78 61 2a 31 2e 35 20 80 |middx=(d|xa*1.5 .|
|00000dc0| 44 20 73 63 61 6c 29 20 | 2d 28 64 78 32 2b 64 78 |D scal) |-(dx2+dx|
|00000dd0| 31 29 20 80 45 20 32 00 | 20 20 20 20 20 20 20 20 |1) .E 2.| |
|00000de0| 20 20 20 20 6d 69 64 64 | 79 3d 28 64 79 61 2a 31 | midd|y=(dya*1|
|00000df0| 2e 35 20 80 44 20 73 63 | 61 6c 29 20 2d 28 64 79 |.5 .D sc|al) -(dy|
|00000e00| 32 2b 64 79 31 29 20 80 | 45 20 32 00 00 20 20 20 |2+dy1) .|E 2.. |
|00000e10| 20 20 20 20 20 20 20 20 | 20 6d 69 64 64 78 3d 6d | | middx=m|
|00000e20| 69 64 64 78 20 20 2b 28 | 64 79 28 78 78 2b 62 63 |iddx +(|dy(xx+bc|
|00000e30| 2c 79 79 29 2d 64 79 28 | 78 78 2c 79 79 29 20 2b |,yy)-dy(|xx,yy) +|
|00000e40| 64 79 28 78 78 2c 79 79 | 2b 62 63 29 2d 64 79 28 |dy(xx,yy|+bc)-dy(|
|00000e50| 78 78 2b 62 63 2c 79 79 | 2b 62 63 29 20 29 20 80 |xx+bc,yy|+bc) ) .|
|00000e60| 45 20 32 20 20 3b 63 72 | 6f 73 73 2d 74 6f 72 74 |E 2 ;cr|oss-tort|
|00000e70| 69 6f 6e 61 6c 2e 2e 20 | 64 75 68 00 20 20 20 20 |ional.. |duh. |
|00000e80| 20 20 20 20 20 20 20 20 | 6d 69 64 64 79 3d 6d 69 | |middy=mi|
|00000e90| 64 64 79 20 20 2b 28 64 | 78 28 78 78 2b 62 63 2c |ddy +(d|x(xx+bc,|
|00000ea0| 79 79 29 2d 64 78 28 78 | 78 2c 79 79 29 20 2b 64 |yy)-dx(x|x,yy) +d|
|00000eb0| 78 28 78 78 2c 79 79 2b | 62 63 29 2d 64 78 28 78 |x(xx,yy+|bc)-dx(x|
|00000ec0| 78 2b 62 63 2c 79 79 2b | 62 63 29 20 29 20 80 45 |x+bc,yy+|bc) ) .E|
|00000ed0| 20 32 00 00 20 20 20 20 | 20 20 20 20 20 20 20 20 | 2.. | |
|00000ee0| 21 73 65 74 64 65 76 73 | 7b 32 2a 31 2e 34 31 34 |!setdevs|{2*1.414|
|00000ef0| 7d 00 00 20 20 20 20 20 | 20 20 20 20 20 80 c0 00 |}.. | ...|
|00000f00| 00 20 20 20 20 20 20 20 | 20 80 c0 00 00 20 20 20 |. | .... |
|00000f10| 20 20 20 80 17 00 20 20 | 20 20 80 17 00 00 20 20 | ... | .... |
|00000f20| 80 c1 00 00 80 1c 20 31 | 3d 30 00 20 20 80 16 20 |...... 1|=0. .. |
|00000f30| 78 78 3d 30 20 80 18 20 | 23 62 67 00 20 20 20 20 |xx=0 .. |#bg. |
|00000f40| 6e 78 3d 78 78 20 80 45 | 20 23 73 69 7a 65 00 20 |nx=xx .E| #size. |
|00000f50| 20 20 20 80 16 20 79 79 | 3d 30 20 80 18 20 23 62 | .. yy|=0 .. #b|
|00000f60| 67 00 20 20 20 20 20 20 | 6e 79 3d 79 79 20 80 45 |g. |ny=yy .E|
|00000f70| 20 23 73 69 7a 65 00 20 | 3b 20 20 20 20 20 20 20 | #size. |; |
|00000f80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000f90| 20 20 20 20 20 20 20 20 | 20 20 2d 31 2f 38 00 3b | | -1/8.;|
|00000fa0| 20 20 20 20 20 20 6d 69 | 64 7a 3d 6e 78 2a 6e 78 | mi|dz=nx*nx|
|00000fb0| 2a 28 6e 78 2d 31 29 2a | 28 31 2d 6e 79 29 2a 38 |*(nx-1)*|(1-ny)*8|
|00000fc0| 20 20 3b 78 2a 78 2a 78 | 20 2d 78 2a 78 20 3b 20 | ;x*x*x| -x*x ; |
|00000fd0| 33 2a 78 2a 78 2d 32 2a | 78 00 20 20 20 20 20 20 |3*x*x-2*|x. |
|00000fe0| 6d 69 64 7a 3d 28 31 2d | 6e 79 29 2a 28 6e 78 2a |midz=(1-|ny)*(nx*|
|00000ff0| 6e 78 2a 33 2d 32 2a 6e | 78 2a 6e 78 2a 6e 78 29 |nx*3-2*n|x*nx*nx)|
|00001000| 00 20 20 20 20 20 20 68 | 28 78 78 2c 79 79 29 3d |. h|(xx,yy)=|
|00001010| 6d 69 64 7a 00 00 20 20 | 20 20 80 17 00 20 20 80 |midz.. | ... .|
|00001020| 17 00 80 1f 00 80 07 00 | 00 00 80 01 2e 71 75 61 |........|.....qua|
|00001030| 64 00 20 20 78 30 2e 77 | 3a 79 30 3a 78 31 3a 79 |d. x0.w|:y0:x1:y|
|00001040| 31 3a 78 32 3a 79 32 3a | 78 33 3a 79 33 00 80 02 |1:x2:y2:|x3:y3...|
|00001050| 20 80 01 00 00 80 0d 20 | 73 65 74 78 79 00 3b 20 | ...... |setxy.; |
|00001060| 20 73 78 60 31 3d 28 28 | 60 32 2d 60 33 29 20 41 | sx`1=((|`2-`3) A|
|00001070| 53 52 20 23 73 69 7a 65 | 20 20 20 20 20 20 20 20 |SR #size| |
|00001080| 20 29 20 41 53 4c 20 37 | 20 2b 31 36 30 00 3b 20 | ) ASL 7| +160.; |
|00001090| 20 73 79 60 31 3d 28 28 | 60 32 2b 60 33 29 20 41 | sy`1=((|`2+`3) A|
|000010a0| 53 52 20 23 73 69 7a 65 | 2d 68 28 60 32 2c 60 33 |SR #size|-h(`2,`3|
|000010b0| 29 29 20 41 53 4c 20 36 | 20 2b 31 32 38 00 20 20 |)) ASL 6| +128. |
|000010c0| 71 2e 71 75 61 64 5c 78 | 60 31 3d 28 28 60 32 2d |q.quad\x|`1=((`2-|
|000010d0| 60 33 29 20 80 45 20 23 | 73 69 7a 65 20 20 20 20 |`3) .E #|size |
|000010e0| 20 20 20 20 20 29 20 80 | 44 20 39 20 2b 31 36 30 | ) .|D 9 +160|
|000010f0| 00 20 20 71 2e 71 75 61 | 64 5c 79 60 31 3d 28 28 |. q.qua|d\y`1=((|
|00001100| 60 32 2b 60 33 29 20 80 | 45 20 23 73 69 7a 65 2d |`2+`3) .|E #size-|
|00001110| 68 28 60 32 2c 60 33 29 | 29 20 80 44 20 38 20 2b |h(`2,`3)|) .D 8 +|
|00001120| 38 30 00 80 02 20 80 0d | 00 00 2e 44 72 61 77 00 |80... ..|...Draw.|
|00001130| 00 6f 72 61 3d 31 2d 66 | 72 61 00 80 16 20 78 2e |.ora=1-f|ra... x.|
|00001140| 71 3d 30 20 80 18 20 23 | 62 69 67 00 20 20 78 32 |q=0 .. #|big. x2|
|00001150| 3d 78 2b 31 00 20 20 80 | 16 20 79 2e 71 3d 30 20 |=x+1. .|. y.q=0 |
|00001160| 80 18 20 23 62 69 67 00 | 20 20 20 20 79 32 3d 79 |.. #big.| y2=y|
|00001170| 2b 31 00 00 00 80 1c 20 | 31 3d 30 00 20 20 20 20 |+1..... |1=0. |
|00001180| 21 73 65 74 78 79 7b 30 | 2c 78 20 2c 79 20 7d 00 |!setxy{0|,x ,y }.|
|00001190| 20 20 20 20 80 0b 20 78 | 3c 23 62 67 00 20 20 20 | .. x|<#bg. |
|000011a0| 20 20 20 21 73 65 74 78 | 79 7b 32 2c 78 32 2c 79 | !setx|y{2,x2,y|
|000011b0| 20 7d 00 20 20 20 20 20 | 20 bb 85 20 73 78 30 2c | }. | .. sx0,|
|000011c0| 73 79 31 2c 73 78 32 2c | 73 79 32 2c 31 00 20 20 |sy1,sx2,|sy2,1. |
|000011d0| 20 20 80 c0 20 20 20 20 | 20 20 20 20 20 20 20 20 | .. | |
|000011e0| 20 20 20 34 00 20 20 20 | 20 80 0b 20 79 3c 23 62 | 4. | .. y<#b|
|000011f0| 67 00 20 20 20 20 20 20 | 21 73 65 74 78 79 7b 33 |g. |!setxy{3|
|00001200| 2c 78 20 2c 79 32 7d 00 | 20 20 20 20 20 20 bb 85 |,x ,y2}.| ..|
|00001210| 20 73 78 30 2c 73 79 31 | 2c 73 78 33 2c 73 79 33 | sx0,sy1|,sx3,sy3|
|00001220| 2c 31 00 20 20 20 20 80 | c0 00 80 1e 00 20 20 20 |,1. .|..... |
|00001230| 20 20 20 21 73 65 74 78 | 79 7b 30 2c 78 20 2c 79 | !setx|y{0,x ,y|
|00001240| 20 7d 00 20 20 20 20 20 | 20 21 73 65 74 78 79 7b | }. | !setxy{|
|00001250| 31 2c 78 20 2c 79 32 7d | 00 20 20 20 20 20 20 21 |1,x ,y2}|. !|
|00001260| 73 65 74 78 79 7b 32 2c | 78 32 2c 79 32 7d 00 20 |setxy{2,|x2,y2}. |
|00001270| 20 20 20 20 20 21 73 65 | 74 78 79 7b 33 2c 78 32 | !se|txy{3,x2|
|00001280| 2c 79 20 7d 00 20 20 20 | 20 20 20 64 69 66 3d 28 |,y }. | dif=(|
|00001290| 68 28 78 2c 79 29 2d 68 | 28 78 32 2c 79 29 20 29 |h(x,y)-h|(x2,y) )|
|000012a0| 20 80 44 20 23 73 69 7a | 65 00 20 20 20 20 20 20 | .D #siz|e. |
|000012b0| 74 65 6d 70 3d e0 04 28 | 64 69 66 2a 2e 35 29 00 |temp=..(|dif*.5).|
|000012c0| 20 20 20 20 20 20 63 6f | 6c 3d bc 0a 28 74 65 6d | co|l=..(tem|
|000012d0| 70 20 2a 20 38 30 2b 31 | 32 38 2c 32 2c 32 35 35 |p * 80+1|28,2,255|
|000012e0| 29 00 20 20 20 20 20 20 | bb 8b 20 34 2c 26 71 2c |). |.. 4,&q,|
|000012f0| 63 6f 6c 00 80 1f 00 00 | 00 00 20 20 80 17 00 80 |col.....|.. ....|
|00001300| 17 00 80 07 00 00 00 80 | 0d 20 73 65 74 78 79 32 |........|. setxy2|
|00001310| 00 20 20 71 2e 71 75 61 | 64 5c 78 60 31 3d 28 28 |. q.qua|d\x`1=((|
|00001320| 60 32 2a 71 63 2d 60 33 | 2a 71 73 29 20 80 45 20 |`2*qc-`3|*qs) .E |
|00001330| 23 73 69 7a 65 20 20 20 | 20 20 20 20 20 20 29 20 |#size | ) |
|00001340| 80 44 20 38 20 2b 62 61 | 73 65 78 3b 31 36 30 00 |.D 8 +ba|sex;160.|
|00001350| 20 20 71 2e 71 75 61 64 | 5c 79 60 31 3d 28 28 60 | q.quad|\y`1=((`|
|00001360| 32 2a 71 73 2b 60 33 2a | 71 63 29 20 80 45 20 23 |2*qs+`3*|qc) .E #|
|00001370| 73 69 7a 65 2d 68 28 60 | 32 2c 60 33 29 29 20 80 |size-h(`|2,`3)) .|
|00001380| 44 20 36 20 2b 62 61 73 | 65 79 3b 31 32 38 00 80 |D 6 +bas|ey;128..|
|00001390| 02 20 80 0d 00 00 2e 44 | 72 61 77 32 00 00 71 63 |. .....D|raw2..qc|
|000013a0| 3d e0 05 28 61 6e 67 29 | 2a 31 2e 34 31 34 00 71 |=..(ang)|*1.414.q|
|000013b0| 73 3d e0 0a 28 61 6e 67 | 29 2a 31 2e 34 31 34 00 |s=..(ang|)*1.414.|
|000013c0| 00 00 62 61 73 65 78 3d | 31 36 30 2d 28 71 63 2d |..basex=|160-(qc-|
|000013d0| 71 73 29 20 80 44 20 36 | 00 62 61 73 65 79 3d 31 |qs) .D 6|.basey=1|
|000013e0| 33 30 2d 28 71 63 2b 71 | 73 29 20 80 44 20 35 00 |30-(qc+q|s) .D 5.|
|000013f0| 00 6f 72 61 3d 31 2d 66 | 72 61 00 73 74 78 3d 30 |.ora=1-f|ra.stx=0|
|00001400| 3a 65 64 78 3d 23 62 69 | 67 3a 73 74 70 78 3d 31 |:edx=#bi|g:stpx=1|
|00001410| 00 80 0b 20 71 73 3c 30 | 20 80 21 20 80 c9 20 73 |... qs<0| .! .. s|
|00001420| 74 78 2c 65 64 78 3a 73 | 74 70 78 3d 2d 73 74 70 |tx,edx:s|tpx=-stp|
|00001430| 78 00 00 73 74 79 3d 30 | 3a 65 64 79 3d 23 62 69 |x..sty=0|:edy=#bi|
|00001440| 67 3a 73 74 70 79 3d 31 | 00 80 0b 20 71 63 3c 30 |g:stpy=1|... qc<0|
|00001450| 20 80 21 20 80 c9 20 73 | 74 79 2c 65 64 79 3a 73 | .! .. s|ty,edy:s|
|00001460| 74 70 79 3d 2d 73 74 70 | 79 00 00 80 16 20 78 2e |tpy=-stp|y.... x.|
|00001470| 71 3d 73 74 78 20 80 18 | 20 65 64 78 20 80 19 20 |q=stx ..| edx .. |
|00001480| 73 74 70 78 00 20 20 78 | 32 3d 78 2b 31 00 00 20 |stpx. x|2=x+1.. |
|00001490| 20 80 16 20 79 2e 71 3d | 73 74 79 20 80 18 20 65 | .. y.q=|sty .. e|
|000014a0| 64 79 20 80 19 20 73 74 | 70 79 00 20 20 20 20 79 |dy .. st|py. y|
|000014b0| 32 3d 79 2b 31 00 00 80 | 1c 20 31 3d 30 00 20 20 |2=y+1...|. 1=0. |
|000014c0| 20 20 21 73 65 74 78 79 | 32 7b 30 2c 78 20 2c 79 | !setxy|2{0,x ,y|
|000014d0| 20 7d 00 20 20 20 20 80 | 0b 20 78 3c 23 62 67 00 | }. .|. x<#bg.|
|000014e0| 20 20 20 20 20 20 21 73 | 65 74 78 79 32 7b 32 2c | !s|etxy2{2,|
|000014f0| 78 32 2c 79 20 7d 00 20 | 20 20 20 20 20 bb 85 20 |x2,y }. | .. |
|00001500| 73 78 30 2c 73 79 30 2c | 73 78 32 2c 73 79 32 2c |sx0,sy0,|sx2,sy2,|
|00001510| 31 00 20 20 20 20 80 c0 | 00 20 20 20 20 80 0b 20 |1. ..|. .. |
|00001520| 79 3c 23 62 67 00 20 20 | 20 20 20 20 21 73 65 74 |y<#bg. | !set|
|00001530| 78 79 32 7b 33 2c 78 20 | 2c 79 32 7d 00 20 20 20 |xy2{3,x |,y2}. |
|00001540| 20 20 20 bb 85 20 73 78 | 30 2c 73 79 30 2c 73 78 | .. sx|0,sy0,sx|
|00001550| 33 2c 73 79 33 2c 31 00 | 20 20 20 20 80 c0 00 80 |3,sy3,1.| ....|
|00001560| 1e 00 20 20 20 20 20 20 | 21 73 65 74 78 79 32 7b |.. |!setxy2{|
|00001570| 30 2c 78 20 2c 79 20 7d | 00 20 20 20 20 20 20 21 |0,x ,y }|. !|
|00001580| 73 65 74 78 79 32 7b 31 | 2c 78 20 2c 79 32 7d 00 |setxy2{1|,x ,y2}.|
|00001590| 20 20 20 20 20 20 21 73 | 65 74 78 79 32 7b 32 2c | !s|etxy2{2,|
|000015a0| 78 32 2c 79 32 7d 00 20 | 20 20 20 20 20 21 73 65 |x2,y2}. | !se|
|000015b0| 74 78 79 32 7b 33 2c 78 | 32 2c 79 20 7d 00 20 20 |txy2{3,x|2,y }. |
|000015c0| 20 20 20 20 64 69 66 78 | 3d 28 68 28 78 2c 79 29 | difx|=(h(x,y)|
|000015d0| 2d 68 28 78 32 2c 79 20 | 29 20 29 20 80 44 20 23 |-h(x2,y |) ) .D #|
|000015e0| 73 69 7a 65 00 20 20 20 | 20 20 20 64 69 66 79 3d |size. | dify=|
|000015f0| 28 68 28 78 2c 79 29 2d | 68 28 78 20 2c 79 32 29 |(h(x,y)-|h(x ,y2)|
|00001600| 20 29 20 80 44 20 23 73 | 69 7a 65 00 00 20 20 20 | ) .D #s|ize.. |
|00001610| 20 20 20 64 69 66 3d 71 | 63 32 2a 64 69 66 78 2d | dif=q|c2*difx-|
|00001620| 71 73 32 2a 64 69 66 79 | 00 00 20 20 20 20 20 20 |qs2*dify|.. |
|00001630| 74 65 6d 70 3d e0 04 28 | 64 69 66 2a 2e 35 29 00 |temp=..(|dif*.5).|
|00001640| 20 20 20 20 20 20 63 6f | 6c 3d bc 0a 28 28 74 65 | co|l=..((te|
|00001650| 6d 70 20 2a 20 38 30 29 | 20 80 45 20 34 20 2b 20 |mp * 80)| .E 4 + |
|00001660| 38 2c 31 2c 31 35 29 00 | 20 20 20 20 20 20 bb 8b |8,1,15).| ..|
|00001670| 20 34 2c 26 71 2c 63 6f | 6c 00 80 1f 00 00 00 00 | 4,&q,co|l.......|
|00001680| 20 20 80 17 00 80 17 00 | 80 07 00 | ......|... |
+--------+-------------------------+-------------------------+--------+--------+